home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 4 / Amiga Tools 4.iso / patches / mainactor / mab_patch102 / install-patch < prev    next >
Encoding:
Text File  |  1996-02-26  |  2.0 KB  |  63 lines
  1. ; **** Installscript written by Markus Mönig             ****
  2.  
  3. ; **** Special version for MainActor Broadcast           ****
  4. ; **** by MainConcept, GbR Moenig/Zabel, © 1994, 1995    ****
  5.  
  6. ; **** This script requires the Installer from Commodore ****
  7. ; **** which is available for free.                      ****
  8.  
  9. ; **** Version 1.0 of this script                        ****
  10.  
  11. (set ProductName        "MABroadcast Patch")    ; product Name
  12. (set VersionNum            "1.02")        ; product version number
  13. (set OldVersionNum    "1.01")        ; product version number
  14.  
  15. (set MABName                    "MABroadcast")
  16. (set DefaultMAB                 @default-dest)
  17.  
  18. (set OSVersion            (/ (getversion) 65536))
  19. (set WBVersion            (/ (getversion "version.library" (resident)) 65536))
  20. (set MABNum                     (getversion "MABroadcast:MABroadcast"))
  21. (set MABVer                     (/ MABNum 65536))
  22. (set MABRev                    (- MABNum (* MABVer 65536)))
  23.  
  24. (set @default-dest "MABroadcast:")
  25.  
  26. (transcript "Installing %s Commodity..." ProductName)
  27.  
  28. (set WrongVersion
  29.   ("%s%s%s"
  30.      "You dont have MainActor Broadcast v"
  31.      OldVersionNum
  32.      "\ninstalled !"
  33.   )
  34. )
  35.  
  36. ; Here follow localized strings for the german and english texts
  37. ; used in the script. Adding a new language should be easy by copying
  38. ; the block and translating it.
  39.  
  40. (complete 10)
  41.  
  42. ( if (AND (= MABVer 1) (= MABRev 01) )
  43.         (
  44.             (working "Patching RipAVISound")
  45.           (run ("patcher MABroadcast:Tools/RipAVISound MABroadcast:Tools/RipAVISound patch/RipAVISound"))
  46.             (working "Patching Saver Module")
  47.           (run ("patcher MABroadcast:Support/Save MABroadcast:Support/Save patch/Save"))
  48.             (working "Patching Export Module")
  49.           (run ("patcher MABroadcast:Support/Export MABroadcast:Support/Export patch/Export"))
  50.             (working "Patching FLC Module")
  51.           (run ("patcher MABroadcast:Support/FLC MABroadcast:Support/FLC patch/flc"))
  52.             (working "Patching MABroadcast")
  53.           (run ("patcher MABroadcast:MABroadcast MABroadcast:MABroadcast patch/MABroadcast"))
  54.  
  55.             (exit)
  56.         )
  57.     (
  58.         (abort WrongVersion)
  59.         )
  60. )
  61.  
  62. (complete 95)
  63.